{Test markup macro commands}

macro 'Front image is data';
begin
   MarkupData8(picNumber);
end;

macro 'Front image is data16';
begin
   MarkupData16(picNumber);
end;

macro 'Select data image';
begin
  SelectPic(MarkupPicNumber('data'));
end;

macro 'Select data16 image';
begin
  SelectPic(MarkupPicNumber('data16'));
end;

macro 'Select marks image';
begin
  SelectPic(MarkupPicNumber('mark'));
end;

macro 'Select bkg image';
begin
  SelectPic(MarkupPicNumber('bkg'));
end;

macro 'Show markup';
begin
  MarkupShow;
end;